;;; $Id: boot.lisp 2467 2007-06-04 13:31:04Z mev $
(defun generate ()
  (load "boot-depends")
  (let ((js (js:compile-parenscript-file-to-string #p"boot.parens")))
    (with-open-file (s "boot.js" :direction :output 
		       :if-exists :supersede)
      (format s "~a" js))
    js))
    
  

      
